home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 6 / Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso / 008a / fglqbx10.zip / 05-12.BAS < prev    next >
BASIC Source File  |  1991-06-07  |  237b  |  22 lines
  1. REM $INCLUDE: 'fastgraf.bi'
  2.  
  3. DEFINT A-Z
  4.  
  5. DIM Zeroes(16)
  6.  
  7. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  8.  
  9. FOR I = 0 TO 15
  10.    READ Zeroes(I)
  11. NEXT
  12.  
  13. Mode = FGgetmode
  14. FGsetmode 13
  15.  
  16. FGpalettes Zeroes()
  17.  
  18. FGsetmode Mode
  19. FGreset
  20.  
  21. END
  22.